home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / storage / function / pcmcia / socket / getsoc2.scr < prev    next >
Encoding:
Text File  |  1994-05-11  |  395 b   |  18 lines
  1. @thread getsoc2.log
  2. @newalias AC1 PCMC.GRA
  3. AC1 SET ADAPTER=0
  4.  
  5. * ----- for first socket -----
  6.  
  7. AC1 SET SOCKET=0
  8. AC1 PCMC_OPEN
  9. *AC1 RESPONSE $PROMPT="Enter Adapter Number : " $RESPONSE=ADAPTER $PAUSE=5
  10. *AC1 RESPONSE $PROMPT="Enter Socket Number : " $RESPONSE=SOCKET $PAUSE=5
  11. AC1 PCMC_GETSOCKET
  12.  
  13. * ----- for second socket -----
  14.  
  15. AC1 SET SOCKET=1
  16. AC1 PCMC_GETSOCKET
  17. AC1 PCMC_CLOSE
  18.